/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / backquote.elc.z / backquote.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6b 77 7a 68 40 63 68 |piled by| kwzh@ch|
|00000020| 75 72 63 68 79 2e 67 6e | 75 2e 61 69 2e 6d 69 74 |urchy.gn|u.ai.mit|
|00000030| 2e 65 64 75 20 6f 6e 20 | 54 68 75 20 4d 61 79 20 |.edu on |Thu May |
|00000040| 32 33 20 31 34 3a 30 36 | 3a 30 32 20 31 39 39 36 |23 14:06|:02 1996|
|00000050| 0a 3b 3b 3b 20 66 72 6f | 6d 20 66 69 6c 65 20 2f |.;;; fro|m file /|
|00000060| 67 64 2f 67 6e 75 2f 65 | 6d 61 63 73 2f 31 39 2e |gd/gnu/e|macs/19.|
|00000070| 30 2f 6c 69 73 70 2f 62 | 61 63 6b 71 75 6f 74 65 |0/lisp/b|ackquote|
|00000080| 2e 65 6c 0a 3b 3b 3b 20 | 65 6d 61 63 73 20 76 65 |.el.;;; |emacs ve|
|00000090| 72 73 69 6f 6e 20 31 39 | 2e 33 31 2e 31 2e 0a 3b |rsion 19|.31.1..;|
|000000a0| 3b 3b 20 62 79 74 65 63 | 6f 6d 70 20 76 65 72 73 |;; bytec|omp vers|
|000000b0| 69 6f 6e 20 46 53 46 20 | 32 2e 31 30 0a 3b 3b 3b |ion FSF |2.10.;;;|
|000000c0| 20 6f 70 74 69 6d 69 7a | 61 74 69 6f 6e 20 69 73 | optimiz|ation is|
|000000d0| 20 6f 6e 2e 0a 3b 3b 3b | 20 74 68 69 73 20 66 69 | on..;;;| this fi|
|000000e0| 6c 65 20 75 73 65 73 20 | 6f 70 63 6f 64 65 73 20 |le uses |opcodes |
|000000f0| 77 68 69 63 68 20 64 6f | 20 6e 6f 74 20 65 78 69 |which do| not exi|
|00000100| 73 74 20 69 6e 20 45 6d | 61 63 73 20 31 38 2e 0a |st in Em|acs 18..|
|00000110| 0a 28 69 66 20 28 61 6e | 64 20 28 62 6f 75 6e 64 |.(if (an|d (bound|
|00000120| 70 20 27 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |p 'emacs|-version|
|00000130| 29 0a 09 20 28 6f 72 20 | 28 61 6e 64 20 28 62 6f |).. (or |(and (bo|
|00000140| 75 6e 64 70 20 27 65 70 | 6f 63 68 3a 3a 76 65 72 |undp 'ep|och::ver|
|00000150| 73 69 6f 6e 29 20 65 70 | 6f 63 68 3a 3a 76 65 72 |sion) ep|och::ver|
|00000160| 73 69 6f 6e 29 0a 09 20 | 20 20 20 20 28 73 74 72 |sion).. |    (str|
|00000170| 69 6e 67 2d 6c 65 73 73 | 70 20 65 6d 61 63 73 2d |ing-less|p emacs-|
|00000180| 76 65 72 73 69 6f 6e 20 | 22 31 39 2e 32 39 22 29 |version |"19.29")|
|00000190| 29 29 0a 20 20 20 20 28 | 65 72 72 6f 72 20 22 60 |)).    (|error "`|
|000001a0| 62 61 63 6b 71 75 6f 74 | 65 2e 65 6c 27 20 77 61 |backquot|e.el' wa|
|000001b0| 73 20 63 6f 6d 70 69 6c | 65 64 20 66 6f 72 20 45 |s compil|ed for E|
|000001c0| 6d 61 63 73 20 31 39 2e | 32 39 20 6f 72 20 6c 61 |macs 19.|29 or la|
|000001d0| 74 65 72 22 29 29 0a 0a | 0a 28 70 72 6f 76 69 64 |ter"))..|.(provid|
|000001e0| 65 20 28 71 75 6f 74 65 | 20 62 61 63 6b 71 75 6f |e (quote| backquo|
|000001f0| 74 65 29 29 0a 23 40 31 | 31 37 20 4c 69 6b 65 20 |te)).#@1|17 Like |
|00000200| 60 6c 69 73 74 27 20 62 | 75 74 20 74 68 65 20 6c |`list' b|ut the l|
|00000210| 61 73 74 20 61 72 67 75 | 6d 65 6e 74 20 69 73 20 |ast argu|ment is |
|00000220| 74 68 65 20 74 61 69 6c | 20 6f 66 20 74 68 65 20 |the tail| of the |
|00000230| 6e 65 77 20 6c 69 73 74 | 2e 0a 0a 46 6f 72 20 65 |new list|...For e|
|00000240| 78 61 6d 70 6c 65 20 28 | 62 61 63 6b 71 75 6f 74 |xample (|backquot|
|00000250| 65 2d 6c 69 73 74 2a 20 | 27 61 20 27 62 20 27 63 |e-list* |'a 'b 'c|
|00000260| 29 20 3d 3e 20 28 61 20 | 62 20 2e 20 63 29 1f 0a |) => (a |b . c)..|
|00000270| 28 64 65 66 61 6c 69 61 | 73 20 27 62 61 63 6b 71 |(defalia|s 'backq|
|00000280| 75 6f 74 65 2d 6c 69 73 | 74 2a 2d 66 75 6e 63 74 |uote-lis|t*-funct|
|00000290| 69 6f 6e 20 23 5b 28 66 | 69 72 73 74 20 26 72 65 |ion #[(f|irst &re|
|000002a0| 73 74 20 6c 69 73 74 29 | 20 22 08 83 2a 00 08 19 |st list)| "..*...|
|000002b0| 5c 6e c3 42 89 1c 1d 09 | 41 83 5c 22 00 0d 09 40 |\n.B....|A.\"...@|
|000002c0| c3 42 a1 88 0d 41 15 09 | 41 89 11 82 0d 00 0d 09 |.B...A..|A.......|
|000002d0| 40 a1 88 5c 66 2b 87 5c | 6e 87 22 20 5b 6c 69 73 |@..\f+.\|n." [lis|
|000002e0| 74 20 72 65 73 74 20 66 | 69 72 73 74 20 6e 69 6c |t rest f|irst nil|
|000002f0| 20 6e 65 77 6c 69 73 74 | 20 6c 61 73 74 5d 20 34 | newlist| last] 4|
|00000300| 20 28 23 24 20 2e 20 35 | 30 37 29 5d 29 0a 23 40 | (#$ . 5|07)]).#@|
|00000310| 31 31 37 20 4c 69 6b 65 | 20 60 6c 69 73 74 27 20 |117 Like| `list' |
|00000320| 62 75 74 20 74 68 65 20 | 6c 61 73 74 20 61 72 67 |but the |last arg|
|00000330| 75 6d 65 6e 74 20 69 73 | 20 74 68 65 20 74 61 69 |ument is| the tai|
|00000340| 6c 20 6f 66 20 74 68 65 | 20 6e 65 77 20 6c 69 73 |l of the| new lis|
|00000350| 74 2e 0a 0a 46 6f 72 20 | 65 78 61 6d 70 6c 65 20 |t...For |example |
|00000360| 28 62 61 63 6b 71 75 6f | 74 65 2d 6c 69 73 74 2a |(backquo|te-list*|
|00000370| 20 27 61 20 27 62 20 27 | 63 29 20 3d 3e 20 28 61 | 'a 'b '|c) => (a|
|00000380| 20 62 20 2e 20 63 29 1f | 0a 28 64 65 66 61 6c 69 | b . c).|.(defali|
|00000390| 61 73 20 27 62 61 63 6b | 71 75 6f 74 65 2d 6c 69 |as 'back|quote-li|
|000003a0| 73 74 2a 2d 6d 61 63 72 | 6f 20 27 28 6d 61 63 72 |st*-macr|o '(macr|
|000003b0| 6f 20 2e 20 23 5b 28 66 | 69 72 73 74 20 26 72 65 |o . #[(f|irst &re|
|000003c0| 73 74 20 6c 69 73 74 29 | 20 22 c0 09 5c 6e 42 21 |st list)| "..\nB!|
|000003d0| 89 12 40 11 5c 6e 41 89 | 12 83 33 00 5c 6e 40 1b |..@.\nA.|..3.\n@.|
|000003e0| 5c 6e 41 1c c5 0b 09 45 | 1e 06 5c 66 83 2f 00 c5 |\nA....E|..\f./..|
|000003f0| 5c 66 40 0e 06 45 16 06 | 5c 66 41 89 14 84 20 00 |\f@..E..|\fA... .|
|00000400| 0e 06 2b 87 09 87 22 20 | 5b 72 65 76 65 72 73 65 |..+..." |[reverse|
|00000410| 20 66 69 72 73 74 20 6c | 69 73 74 20 73 65 63 6f | first l|ist seco|
|00000420| 6e 64 20 72 65 73 74 20 | 63 6f 6e 73 20 6e 65 77 |nd rest |cons new|
|00000430| 6c 69 73 74 5d 20 34 20 | 28 23 24 20 2e 20 37 38 |list] 4 |(#$ . 78|
|00000440| 38 29 5d 29 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |8)])).(b|yte-code|
|00000450| 20 22 c0 c1 c2 4b 5c 22 | 87 22 20 5b 64 65 66 61 | "...K\"|." [defa|
|00000460| 6c 69 61 73 20 62 61 63 | 6b 71 75 6f 74 65 2d 6c |lias bac|kquote-l|
|00000470| 69 73 74 2a 20 62 61 63 | 6b 71 75 6f 74 65 2d 6c |ist* bac|kquote-l|
|00000480| 69 73 74 2a 2d 6d 61 63 | 72 6f 5d 20 33 29 0a 23 |ist*-mac|ro] 3).#|
|00000490| 40 36 39 20 2a 53 79 6d | 62 6f 6c 20 75 73 65 64 |@69 *Sym|bol used|
|000004a0| 20 74 6f 20 72 65 70 72 | 65 73 65 6e 74 20 61 20 | to repr|esent a |
|000004b0| 62 61 63 6b 71 75 6f 74 | 65 20 6f 72 20 6e 65 73 |backquot|e or nes|
|000004c0| 74 65 64 20 62 61 63 6b | 71 75 6f 74 65 20 28 65 |ted back|quote (e|
|000004d0| 2e 67 2e 20 60 29 2e 1f | 0a 28 64 65 66 76 61 72 |.g. `)..|.(defvar|
|000004e0| 20 62 61 63 6b 71 75 6f | 74 65 2d 62 61 63 6b 71 | backquo|te-backq|
|000004f0| 75 6f 74 65 2d 73 79 6d | 62 6f 6c 20 28 71 75 6f |uote-sym|bol (quo|
|00000500| 74 65 20 5c 60 29 20 28 | 23 24 20 2e 20 2d 31 31 |te \`) (|#$ . -11|
|00000510| 37 32 29 29 0a 23 40 36 | 39 20 2a 53 79 6d 62 6f |72)).#@6|9 *Symbo|
|00000520| 6c 20 75 73 65 64 20 74 | 6f 20 72 65 70 72 65 73 |l used t|o repres|
|00000530| 65 6e 74 20 61 6e 20 75 | 6e 71 75 6f 74 65 20 28 |ent an u|nquote (|
|00000540| 65 2e 67 2e 20 60 2c 27 | 29 20 69 6e 73 69 64 65 |e.g. `,'|) inside|
|00000550| 20 61 20 62 61 63 6b 71 | 75 6f 74 65 2e 1f 0a 28 | a backq|uote...(|
|00000560| 64 65 66 76 61 72 20 62 | 61 63 6b 71 75 6f 74 65 |defvar b|ackquote|
|00000570| 2d 75 6e 71 75 6f 74 65 | 2d 73 79 6d 62 6f 6c 20 |-unquote|-symbol |
|00000580| 28 71 75 6f 74 65 20 5c | 2c 29 20 28 23 24 20 2e |(quote \|,) (#$ .|
|00000590| 20 2d 31 33 30 36 29 29 | 0a 23 40 36 38 20 2a 53 | -1306))|.#@68 *S|
|000005a0| 79 6d 62 6f 6c 20 75 73 | 65 64 20 74 6f 20 72 65 |ymbol us|ed to re|
|000005b0| 70 72 65 73 65 6e 74 20 | 61 20 73 70 6c 69 63 65 |present |a splice|
|000005c0| 20 28 65 2e 67 2e 20 60 | 2c 40 27 29 20 69 6e 73 | (e.g. `|,@') ins|
|000005d0| 69 64 65 20 61 20 62 61 | 63 6b 71 75 6f 74 65 2e |ide a ba|ckquote.|
|000005e0| 1f 0a 28 64 65 66 76 61 | 72 20 62 61 63 6b 71 75 |..(defva|r backqu|
|000005f0| 6f 74 65 2d 73 70 6c 69 | 63 65 2d 73 79 6d 62 6f |ote-spli|ce-symbo|
|00000600| 6c 20 28 71 75 6f 74 65 | 20 5c 2c 40 29 20 28 23 |l (quote| \,@) (#|
|00000610| 24 20 2e 20 2d 31 34 33 | 38 29 29 0a 23 40 34 39 |$ . -143|8)).#@49|
|00000620| 34 20 41 72 67 75 6d 65 | 6e 74 20 53 54 52 55 43 |4 Argume|nt STRUC|
|00000630| 54 55 52 45 20 64 65 73 | 63 72 69 62 65 73 20 61 |TURE des|cribes a|
|00000640| 20 74 65 6d 70 6c 61 74 | 65 20 74 6f 20 62 75 69 | templat|e to bui|
|00000650| 6c 64 2e 0a 0a 54 68 65 | 20 77 68 6f 6c 65 20 73 |ld...The| whole s|
|00000660| 74 72 75 63 74 75 72 65 | 20 61 63 74 73 20 61 73 |tructure| acts as|
|00000670| 20 69 66 20 69 74 20 77 | 65 72 65 20 71 75 6f 74 | if it w|ere quot|
|00000680| 65 64 20 65 78 63 65 70 | 74 20 66 6f 72 20 63 65 |ed excep|t for ce|
|00000690| 72 74 61 69 6e 0a 70 6c | 61 63 65 73 20 77 68 65 |rtain.pl|aces whe|
|000006a0| 72 65 20 65 78 70 72 65 | 73 73 69 6f 6e 73 20 61 |re expre|ssions a|
|000006b0| 72 65 20 65 76 61 6c 75 | 61 74 65 64 20 61 6e 64 |re evalu|ated and|
|000006c0| 20 69 6e 73 65 72 74 65 | 64 20 6f 72 20 73 70 6c | inserte|d or spl|
|000006d0| 69 63 65 64 20 69 6e 2e | 0a 0a 46 6f 72 20 65 78 |iced in.|..For ex|
|000006e0| 61 6d 70 6c 65 3a 0a 0a | 62 20 20 20 20 20 20 20 |ample:..|b       |
|000006f0| 20 20 20 20 20 20 20 3d | 3e 20 28 62 61 20 62 62 |       =|> (ba bb|
|00000700| 20 62 63 29 09 09 3b 20 | 61 73 73 75 6d 65 20 62 | bc)..; |assume b|
|00000710| 20 68 61 73 20 74 68 69 | 73 20 76 61 6c 75 65 0a | has thi|s value.|
|00000720| 60 28 61 20 62 20 63 29 | 20 20 20 20 20 20 20 3d |`(a b c)|       =|
|00000730| 3e 20 28 61 20 62 20 63 | 29 09 09 3b 20 62 61 63 |> (a b c|)..; bac|
|00000740| 6b 71 75 6f 74 65 20 61 | 63 74 73 20 6c 69 6b 65 |kquote a|cts like|
|00000750| 20 71 75 6f 74 65 0a 60 | 28 61 20 2c 62 20 63 29 | quote.`|(a ,b c)|
|00000760| 20 20 20 20 20 20 3d 3e | 20 28 61 20 28 62 61 20 |      =>| (a (ba |
|00000770| 62 62 20 62 63 29 20 63 | 29 09 3b 20 69 6e 73 65 |bb bc) c|).; inse|
|00000780| 72 74 20 74 68 65 20 76 | 61 6c 75 65 20 6f 66 20 |rt the v|alue of |
|00000790| 62 0a 60 28 61 20 2c 40 | 62 20 63 29 20 20 20 20 |b.`(a ,@|b c)    |
|000007a0| 20 3d 3e 20 28 61 20 62 | 61 20 62 62 20 62 63 20 | => (a b|a bb bc |
|000007b0| 63 29 09 3b 20 73 70 6c | 69 63 65 20 69 6e 20 74 |c).; spl|ice in t|
|000007c0| 68 65 20 76 61 6c 75 65 | 20 6f 66 20 62 0a 0a 56 |he value| of b..V|
|000007d0| 65 63 74 6f 72 73 20 77 | 6f 72 6b 20 6a 75 73 74 |ectors w|ork just|
|000007e0| 20 6c 69 6b 65 20 6c 69 | 73 74 73 2e 20 20 4e 65 | like li|sts.  Ne|
|000007f0| 73 74 65 64 20 62 61 63 | 6b 71 75 6f 74 65 73 20 |sted bac|kquotes |
|00000800| 61 72 65 20 70 65 72 6d | 69 74 74 65 64 2e 1f 0a |are perm|itted...|
|00000810| 28 64 65 66 61 6c 69 61 | 73 20 27 62 61 63 6b 71 |(defalia|s 'backq|
|00000820| 75 6f 74 65 20 27 28 6d | 61 63 72 6f 20 2e 20 23 |uote '(m|acro . #|
|00000830| 5b 28 61 72 67 29 20 22 | c0 09 21 41 87 22 20 5b |[(arg) "|..!A." [|
|00000840| 62 61 63 6b 71 75 6f 74 | 65 2d 70 72 6f 63 65 73 |backquot|e-proces|
|00000850| 73 20 61 72 67 5d 20 32 | 20 28 23 24 20 2e 20 31 |s arg] 2| (#$ . 1|
|00000860| 35 37 30 29 5d 29 29 0a | 28 62 79 74 65 2d 63 6f |570)])).|(byte-co|
|00000870| 64 65 20 22 c0 c1 c2 4b | 5c 22 87 22 20 5b 64 65 |de "...K|\"." [de|
|00000880| 66 61 6c 69 61 73 20 5c | 60 20 62 61 63 6b 71 75 |falias \|` backqu|
|00000890| 6f 74 65 5d 20 33 29 0a | 28 64 65 66 61 6c 69 61 |ote] 3).|(defalia|
|000008a0| 73 20 27 62 61 63 6b 71 | 75 6f 74 65 2d 70 72 6f |s 'backq|uote-pro|
|000008b0| 63 65 73 73 20 23 5b 28 | 73 29 20 22 c0 09 21 83 |cess #[(|s) "..!.|
|000008c0| 43 00 c2 c3 09 c4 5c 22 | 21 89 1d 40 c6 55 83 1a |C.....\"|!..@.U..|
|000008d0| 00 c6 09 42 82 41 00 c7 | 0d 41 40 c8 3d 83 2b 00 |...B.A..|.A@.=.+.|
|000008e0| c9 0d 41 41 42 82 40 00 | 0d 41 40 c3 3d 83 3b 00 |..AAB.@.|.A@.=.;.|
|000008f0| ca 0d 41 41 42 82 40 00 | cb cc 0d 41 45 42 29 87 |..AAB.@.|...AEB).|
|00000900| 09 3a 84 61 00 c6 09 83 | 58 00 09 cd 3d 84 58 00 |.:.a....|X...=.X.|
|00000910| 09 39 84 5c 5c 00 09 82 | 5f 00 ce 09 44 42 87 09 |.9.\\...|_...DB..|
|00000920| 40 0e 0f 3d 83 6f 00 c7 | 09 41 40 42 87 09 40 0e |@..=.o..|.A@B..@.|
|00000930| 10 3d 83 7d 00 d1 09 41 | 40 42 87 09 40 0e 12 3d |.=.}...A|@B..@..=|
|00000940| 83 8e 00 c2 89 09 41 40 | 21 41 21 87 09 c4 89 89 |......A@|!A!.....|
|00000950| 89 89 1e 13 1e 14 1e 08 | 1e 15 1e 16 89 1e 17 3a |........|.......:|
|00000960| 83 ff 00 0e 17 40 0e 0f | 3d 83 b8 00 0e 10 0e 17 |.....@..|=.......|
|00000970| 41 40 44 43 16 17 c2 0e | 17 40 21 89 16 16 40 d1 |A@DC....|.@!...@.|
|00000980| 55 83 ef 00 0e 14 84 d2 | 00 0e 08 16 15 c4 16 08 |U.......|........|
|00000990| 0e 08 83 e1 00 d8 0e 08 | d9 5c 22 0e 14 42 16 14 |........|.\"..B..|
|000009a0| 0e 16 41 0e 14 42 16 14 | c4 16 08 82 f6 00 0e 16 |..A..B..|........|
|000009b0| 0e 08 42 16 08 0e 17 41 | 89 16 17 82 a1 00 0e 17 |..B....A|........|
|000009c0| 84 09 01 0e 08 83 16 01 | d8 0e 08 c2 0e 17 21 5c |........|......!\|
|000009d0| 22 0e 14 42 16 14 0e 14 | 41 84 26 01 0e 14 40 a2 |"..B....|A.&...@.|
|000009e0| 0e 10 3d 83 2e 01 c3 0e | 14 9f 42 82 31 01 0e 14 |..=.....|..B.1...|
|000009f0| 40 16 13 0e 15 83 42 01 | d8 0e 15 c7 0e 13 42 5c |@.....B.|......B\|
|00000a00| 22 16 13 0e 13 a2 ce 3d | 83 52 01 c6 ce 09 44 42 |"......=|.R....DB|
|00000a10| 82 56 01 c7 0e 13 42 2e | 06 87 22 20 5b 76 65 63 |.V....B.|.." [vec|
|00000a20| 74 6f 72 70 20 73 20 62 | 61 63 6b 71 75 6f 74 65 |torp s b|ackquote|
|00000a30| 2d 70 72 6f 63 65 73 73 | 20 61 70 70 65 6e 64 20 |-process| append |
|00000a40| 6e 69 6c 20 6e 20 30 20 | 31 20 6c 69 73 74 20 76 |nil n 0 |1 list v|
|00000a50| 65 63 74 6f 72 20 76 63 | 6f 6e 63 61 74 20 61 70 |ector vc|oncat ap|
|00000a60| 70 6c 79 20 28 66 75 6e | 63 74 69 6f 6e 20 76 65 |ply (fun|ction ve|
|00000a70| 63 74 6f 72 29 20 74 20 | 71 75 6f 74 65 20 62 61 |ctor) t |quote ba|
|00000a80| 63 6b 71 75 6f 74 65 2d | 75 6e 71 75 6f 74 65 2d |ckquote-|unquote-|
|00000a90| 73 79 6d 62 6f 6c 20 62 | 61 63 6b 71 75 6f 74 65 |symbol b|ackquote|
|00000aa0| 2d 73 70 6c 69 63 65 2d | 73 79 6d 62 6f 6c 20 32 |-splice-|symbol 2|
|00000ab0| 20 62 61 63 6b 71 75 6f | 74 65 2d 62 61 63 6b 71 | backquo|te-backq|
|00000ac0| 75 6f 74 65 2d 73 79 6d | 62 6f 6c 20 65 78 70 72 |uote-sym|bol expr|
|00000ad0| 65 73 73 69 6f 6e 20 6c | 69 73 74 73 20 66 69 72 |ession l|ists fir|
|00000ae0| 73 74 6c 69 73 74 20 69 | 74 65 6d 20 72 65 73 74 |stlist i|tem rest|
|00000af0| 20 62 61 63 6b 71 75 6f | 74 65 2d 6c 69 73 74 69 | backquo|te-listi|
|00000b00| 66 79 20 28 30 29 5d 20 | 37 5d 29 0a 28 64 65 66 |fy (0)] |7]).(def|
|00000b10| 61 6c 69 61 73 20 27 62 | 61 63 6b 71 75 6f 74 65 |alias 'b|ackquote|
|00000b20| 2d 6c 69 73 74 69 66 79 | 20 23 5b 28 6c 69 73 74 |-listify| #[(list|
|00000b30| 20 6f 6c 64 2d 74 61 69 | 6c 29 20 22 c0 09 41 5c | old-tai|l) "..A\|
|00000b40| 6e c0 1b 1c 1d 1e 06 09 | 40 c7 55 83 17 00 c8 0d |n.......|@.U.....|
|00000b50| 21 15 c0 11 5c 66 3a 83 | 46 00 5c 66 40 13 5c 66 |!...\f:.|F.\f@.\f|
|00000b60| 41 14 0e 06 84 32 00 09 | 84 32 00 0b 40 c7 55 84 |A....2..|.2..@.U.|
|00000b70| 3c 00 0b 41 0e 06 42 16 | 06 82 17 00 c8 0b 41 21 |<..A..B.|......A!|
|00000b80| 0d 42 15 82 17 00 0d 83 | 85 00 09 84 52 00 c9 0d |.B......|....R...|
|00000b90| 44 15 0e 06 83 81 00 0e | 06 41 86 6b 00 0e 06 40 |D.......|.A.k...@|
|00000ba0| 3a 85 6b 00 0e 06 40 40 | 0e 5c 6e 3d 89 1e 0b 83 |:.k...@@|.\n=....|
|00000bb0| 75 00 cc 82 76 00 cd ce | 0e 06 0d 43 5c 22 29 42 |u...v...|...C\")B|
|00000bc0| 82 89 00 0d 82 89 00 c2 | 0e 06 42 2c 87 22 20 5b |........|..B,." [|
|00000bd0| 6e 69 6c 20 6f 6c 64 2d | 74 61 69 6c 20 6c 69 73 |nil old-|tail lis|
|00000be0| 74 20 69 74 65 6d 20 6c | 69 73 74 2d 74 61 69 6c |t item l|ist-tail|
|00000bf0| 20 74 61 69 6c 20 68 65 | 61 64 73 20 30 20 65 76 | tail he|ads 0 ev|
|00000c00| 61 6c 20 71 75 6f 74 65 | 20 62 61 63 6b 71 75 6f |al quote| backquo|
|00000c10| 74 65 2d 73 70 6c 69 63 | 65 2d 73 79 6d 62 6f 6c |te-splic|e-symbol|
|00000c20| 20 75 73 65 2d 6c 69 73 | 74 2a 20 62 61 63 6b 71 | use-lis|t* backq|
|00000c30| 75 6f 74 65 2d 6c 69 73 | 74 2a 20 63 6f 6e 73 20 |uote-lis|t* cons |
|00000c40| 61 70 70 65 6e 64 5d 20 | 35 5d 29 0a             |append] |5]).    |
+--------+-------------------------+-------------------------+--------+--------+